Dim argDir
argDir = WScript.Arguments.Named("dir")
set ws=WScript.CreateObject("WScript.Shell")
If argDir <> "" Then
    ws.CurrentDirectory = argDir
Else
    WScript.Echo "No directory specified."
    WScript.Quit 1
End If

If WScript.Arguments.Named.Exists("s") Then
    ws.Run "tiny11-powercfg.bat -s " & WScript.Arguments.Named("dir"),0
Else
    ws.Run "tiny11-powercfg.bat -w " & WScript.Arguments.Named("dir"),0
End If